home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio / Ham Radio CD-ROM (Emerald Software) (1995).ISO / ant / antdesig / trans.bas < prev   
BASIC Source File  |  1986-08-02  |  465b  |  18 lines
  1. 10 CLS
  2. 20 PRINT "                 IMPEDANCE TRANSFORMATION"
  3. 30 PRINT "                 ========================"
  4. 40 PRINT
  5. 50 PRINT
  6. 60 INPUT "WHAT IS THE INPUT IMPEDANCE ";ZI
  7. 70 PRINT
  8. 80 INPUT"WHAT IS THE REQUIRED IMPEDANCE";RZ
  9. 90 PRINT
  10. 100 PRINT
  11. 110 PRINT "THE IMPEDANCE OF THE MATCHING LINE = ";SQR(ZI*RZ);" OHMS."
  12. 120 PRINT
  13. 130 PRINT
  14. 140 INPUT "ANOTHER CALCULATION Y=YES N=NO ";A$
  15. 150 IF A$="Y" GOTO 10
  16. 160 IF A$="N"THEN RUN "MENU"
  17. 170 GOTO 120
  18.